﻿
Imports System.IO
Imports xmlctrl
Imports xhtmlctrl

Public Class csslink
    Inherits link

    Protected Overrides Function availableAttribute(ByVal key As String) As Boolean
        Return attributesCollection.href(key)
    End Function

    Public Sub New(Optional ByVal buff As Stream = Nothing)
        MyBase.New(buff)
        attributes("rel") = "stylesheet"
        attributes("type") = network.http.contentType.textcss
    End Sub

End Class
